home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 4: Demo 1 / almathera_demo1.bin / sourcecode / dexion / r0r flash.s < prev    next >
Text File  |  1995-03-17  |  902b  |  66 lines
  1. res:
  2. lea tabel,a1
  3. s:
  4. cmp.b #$00,$dff006
  5. bne s
  6. move.w (a1)+,$dff180
  7. s2:
  8. cmp.b #$15,$dff006
  9. bne s2
  10. move.w (a1)+,$dff180
  11. s3:
  12. cmp.b #$20,$dff006
  13. bne s3
  14. move.w (a1)+,$dff180
  15. s4:
  16. cmp.b #$40,$dff006
  17. bne s4
  18. move.w (a1)+,$dff180
  19. s5:
  20. cmp.b #$50,$dff006
  21. bne s5
  22. move.w (a1)+,$dff180
  23. s6:
  24. cmp.b #$60,$dff006
  25. bne s6
  26. move.w (a1)+,$dff180
  27. s7:
  28. cmp.b #$70,$dff006
  29. bne s7
  30. move.w (a1)+,$dff180
  31. s8:
  32. cmp.b #$80,$dff006
  33. bne s8
  34. move.w (a1)+,$dff180
  35. s9:
  36. cmp.b #$90,$dff006
  37. bne s9
  38. move.w (a1)+,$dff180
  39. sa:
  40. cmp.b #$a0,$dff006
  41. bne sa
  42. move.w (a1)+,$dff180
  43. sb:
  44. cmp.b #$b0,$dff006
  45. bne sb
  46. move.w (a1)+,$dff180
  47. sc:
  48. cmp.b #$c0,$dff006
  49. bne sc
  50. move.w (a1)+,$dff180
  51. st:
  52. cmp.b #$f0,$dff006
  53. bne st
  54. cmp.l #end,a1
  55. beq res
  56. andi.b #64,$bfe001
  57. bne s
  58. rts
  59.  
  60. tabel:
  61. dc.w     $000,$111,$222,$333,$444,$555,$666,$777,$888,$999
  62. dc.w     $aaa,$bbb,$ccc,$ddd,$eee,$fff
  63. dc.w      $eee,$ddd,$ccc,$bbb,$aaa,$999,$888,$777,$666,$555
  64. dc.w    $444,$333,$222,$111,$000
  65. end:
  66.